#pragma once

#include <iostream>
#include <string>
#include <memory>
#include <sys/select.h>
#include "Log.hpp"
#include "Socket.hpp"

using namespace SocketModule;
using namespace LogModule;

#define NUM sizeof(fd_set) * 8

const int gdefaultfd = -1;

class SelectServer
{
public:
    SelectServer(uint16_t port)
        : _port(port), _listen_sockfd(std::make_unique<TcpSocket>()), _isrunning(false)
    {
    }

    ~SelectServer() {}

    void Init()
    {
        _listen_sockfd->BuildTcpSocketMethod(_port);
        for (int i = 0; i < NUM; i++)
        {
            _fd_array[i] = gdefaultfd;
        }

        // 将监听套接字添加到数组中
        _fd_array[0] = _listen_sockfd->Fd();
    }

    void Loop()
    {
        fd_set readfds; // 读文件描述符集
        _isrunning = true;

        while (_isrunning)
        {
            // 清空 readfds 和 timeout
            FD_ZERO(&readfds);
            struct timeval timeout = {10, 0};
            int maxfd = gdefaultfd;

            // 遍历辅助数组
            for (int i = 0; i < NUM; i++)
            {
                // 将所有合法文件描述符(监听、通信)添加到 readfds 中
                if (_fd_array[i] == gdefaultfd)
                    continue;
                FD_SET(_fd_array[i], &readfds);

                // 更新文件描述符的最大值
                if (maxfd < _fd_array[i])
                    maxfd = _fd_array[i];
            }

            // 不能让 accept 来阻塞新连接的到来，而应该让 select 来负责就绪事件的检测
            // 用户告诉内核, 你要帮我关心读事件, 而不需要关系写事件
            int n = select(maxfd + 1, &readfds, nullptr, nullptr, &timeout); // 通知上层的任务
            switch (n)
            {
            case 0:
                std::cout << "time out..." << std::endl;
                break;
            case -1:
                std::cout << "select error..." << std::endl;
                break;
            default:
                // 内核告诉用户, 有读事件就绪了
                std::cout << "有事件就绪了..., timeout: " << timeout.tv_sec << ":" << timeout.tv_usec << std::endl;
                Dispatcher(readfds); // 把已经就绪的 sockfd, 派发给指定的模块
                break;
            }
        }
        _isrunning = false;
    }

    void Accepter()
    {
        // 直接获取新连接, 此时 accept 不会阻塞, 只执行 "拷贝"
        InetAddr client;
        int newsockfd = _listen_sockfd->AcceptOrDie(&client);
        if (newsockfd < 0)
            return;
        else
        {
            std::cout << "获取了一个新连接: " << newsockfd << " client info: " << client.Addr() << std::endl;

            // 由于并不知道 newsockfd 的读事件是否就绪, 不能直接 recv, 否则会阻塞
            // 而是需要让 select 帮助我们关心 newsockfd 的读事件是否就绪
            // 如何做呢? 直接将 newsockfd 添加到辅助数组中的合法位置即可
            int pos = -1;
            for (int j = 0; j < NUM; j++)
            {
                if (_fd_array[j] == gdefaultfd)
                {
                    pos = j;
                    break;
                }
            }
            if (pos == -1)
            {
                LOG(LogLevel::DEBUG) << "服务器已经满了...";
                close(newsockfd);
            }
            else
            {
                _fd_array[pos] = newsockfd;
            }
        }
    }

    void Recver(int who)
    {
        // 合法的, 读事件就绪的, 用于通信的套接字
        char buffer[1024];
        ssize_t n = ::recv(_fd_array[who], buffer, sizeof(buffer) - 1, 0); // 此时 recv 不会阻塞
        if(n > 0)
        {
            buffer[n] = '\0';
            std::cout << "client# " << buffer << std::endl;

            // 将读到的数据回显回去
            std::string message = "echo# ";
            message += buffer;
            ::send(_fd_array[who], message.c_str(), message.size(), 0);
        }
        else if(n == 0)
        {
            LOG(LogLevel::DEBUG) << "客户端退出, sockfd: " << _fd_array[who];
            close(_fd_array[who]);
            _fd_array[who] = gdefaultfd;
        }
        else
        {
            LOG(LogLevel::DEBUG) << "客户端读取出错, sockfd: " << _fd_array[who];
            close(_fd_array[who]);
            _fd_array[who] = gdefaultfd;
        }
    }

    void Dispatcher(fd_set &readfds)
    {
        // 遍历辅助数组
        for (int i = 0; i < NUM; i++)
        {
            // 首先文件描述符必须是合法的
            if (_fd_array[i] == gdefaultfd)
                continue;

            // 如果文件描述符是监听套接字
            if (_fd_array[i] == _listen_sockfd->Fd())
            {
                // 监听套接字的读事件就绪了, 存在客户端连接
                if (FD_ISSET(_fd_array[i], &readfds))
                {
                    Accepter(); // 获取新连接
                }
            }
            else // 如果文件描述符是连接套接字
            {
                // 连接套接字的读事件就绪了, 客户端发送数据
                if(FD_ISSET(_fd_array[i], &readfds))
                {
                    Recver(i); // IO处理
                }
            }
        }
    }

private:
    uint16_t _port;
    std::unique_ptr<Socket> _listen_sockfd;
    bool _isrunning;
    int _fd_array[NUM]; // 辅助数组: 储存合法的文件描述符
};